home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / texture.dxr / 00218_switchSmTri.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  317 b   |  10 lines
  1. on mouseUp me
  2.   global starttexture, numoftextures
  3.   starttexture1 = starttexture + (4 * numoftextures)
  4.   theNum = random(numoftextures)
  5.   repeat while the memberNum of sprite 78 = (theNum + starttexture1)
  6.     theNum = random(numoftextures)
  7.   end repeat
  8.   set the memberNum of sprite 78 to theNum + starttexture1
  9. end
  10.